From: Jim Blandy <jimb@redhat.com>
Date: Tue, 25 May 1993 13:22:21 +0000 (+0000)
Subject: * startup.el (command-line-1): Don't handle `-i'.  We're
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1^2~5^2~95988
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=fbce8654197f01e5e2ca03a6cfad6199e010e05f;p=emacs.git

* startup.el (command-line-1): Don't handle `-i'.  We're
	abandoning the `insert file' meaning in favor of the `use a
	bitmapped icon' meaning.
---

diff --git a/lisp/startup.el b/lisp/startup.el
index b7552fad26b..fa38680d415 100644
--- a/lisp/startup.el
+++ b/lisp/startup.el
@@ -47,7 +47,6 @@
 ; -funcall function	same
 ; -l file		load file
 ; -load file		same
-; -i file		insert file into buffer
 ; -insert file		same
 ; file			visit file
 ; -kill			kill (exit) emacs
@@ -371,10 +370,9 @@ Type \\[describe-distribution] for information on getting the latest version."))
 		       (setq file (expand-file-name file)))
 		   (load file nil t))
 		 (setq command-line-args-left (cdr command-line-args-left)))
-		((or (string-equal argi "-i")
-		     (string-equal argi "-insert"))
+		((string-equal argi "-insert")
 		 (or (stringp (car command-line-args-left))
-		     (error "filename omitted from `-i' option"))
+		     (error "filename omitted from `-insert' option"))
 		 (insert-file-contents (car command-line-args-left))
 		 (setq command-line-args-left (cdr command-line-args-left)))
 		((string-equal argi "-kill")